home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
201-225
/
disk_203
/
gurusguide
/
copper.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-05-06
|
5KB
|
186 lines
/************************************************************************
********** **********
********** C O P P E R I N T E R R U P T **********
********** ------------------------------- **********
********** **********
********** Copyright (C) 1988 Sassenrath Research **********
********** All Rights Reserved. **********
********** **********
********** Example from the "Guru's Guide, Meditation #1" **********
********** **********
*************************************************************************
** **
** - NOTICE - **
** **
** The "Guru's Guide, Meditation #1" contains detailed information **
** about Amiga interrupts as well as a complete discussion of this **
** and other examples. Meditation #1 and all of its examples were **
** written by Carl Sassenrath, the architect of Amiga's multitasking **
** operating system. Copies of the "Guru's Guide" may be obtained **
** from: **
** GURU'S GUIDE, P.O. BOX 1510, UKIAH, CA 95482 **
** **
** Please include a check for $14.95, plus $1.50 shipping ($4.00 if **
** outside North America). CA residents add 6% sales tax. **
** **
** This example may be used for any purposes, commercial, personal, **
** public, and private, so long as ALL of the above text, copyright, **
** mailing address, and this notice are retained in their entirety. **
** **
** THIS EXAMPLE IS PROVIDED WITHOUT WARRANTY OF ANY KIND. **
** **
************************************************************************/
/*
** COMPILATION NOTE:
**
** Compiled under MANX AZTEC C 3.6A. Use the +L compiler option
** and the "c32" library. Link with intrsup.o.
*/
#include <exec/exec.h>
#include <hardware/custom.h>
#include <hardware/intbits.h>
#include <graphics/gfxmacros.h>
#include <graphics/copper.h>
#include <intuition/intuition.h>
APTR GfxBase = NULL;
APTR IntuitionBase = NULL;
struct Task *ATask = NULL;
struct Interrupt *Intr = NULL;
struct Screen *AScreen = NULL;
struct ViewPort *VPort = NULL;
struct UCopList *CoprList = NULL;
struct UCopList *SaveList = NULL;
long ASignal = -1;
long Count = 120;
/* Intuition Screen Specification */
struct NewScreen ScreenSpec =
{
0,0,
320,200,4,
0,0,0,
CUSTOMSCREEN,
0,
(UBYTE *) "Copper Example",
0
};
/* Interrupt Processing Code */
VOID IntrProc()
{
int_start();
if (--Count <= 0) Signal(ATask,1 << ASignal);
int_end();
}
main()
{
MainInit();
VPort = &AScreen->ViewPort;
/* Save old user copper list */
SaveList = VPort->UCopIns;
/* Build a Copper List */
CINIT(CoprList,100);
CWAIT(CoprList,100, 0); /* Video Line 100 */
CMOVE(CoprList,custom.intreq,INTF_SETCLR | INTF_COPER);
CEND(CoprList);
/* Insert new user copper list */
VPort->UCopIns = CoprList;
MakeScreen(AScreen);
RethinkDisplay();
/* Setup copper interrupt */
AddIntServer(INTB_COPER, Intr);
/* Something else to do... */
while (Count > 0) printf("%d\n",Count);
Wait(1 << ASignal); /* Sync-up */
/* Clean up */
RemIntServer(INTB_COPER, Intr);
MainExit(0);
}
MainInit()
{
extern APTR OpenLibrary();
extern struct Screen *OpenScreen();
extern struct Interrupt *MakeIntr();
extern long AllocSignal();
extern struct Task *FindTask();
extern void *AllocMem();
extern int Enable_Abort;
Enable_Abort = 0; /* prevent a CTRL-C */
GfxBase = OpenLibrary("graphics.library", 30);
if (GfxBase == NULL) MainExit(201);
IntuitionBase = OpenLibrary("intuition.library", 30);
if (GfxBase == NULL) MainExit(202);
AScreen = OpenScreen(&ScreenSpec);
if (AScreen == NULL) MainExit(210);
CoprList = AllocMem(sizeof(*CoprList), MEMF_CLEAR);
if (CoprList == NULL) MainExit(220);
ASignal = AllocSignal(-1);
if (ASignal == -1) MainExit(230);
Intr = MakeIntr("copper.example",0,&IntrProc,0);
if (Intr == NULL) MainExit(240);
ATask = FindTask(NULL);
}
MainExit(error)
int error;
{
if (AScreen != NULL)
{
VPort->UCopIns = SaveList; /* restore it */
MakeScreen(AScreen);
RethinkDisplay();
CloseScreen(AScreen);
}
if (CoprList != NULL)
{
/* Free intermediate copper list */
FreeCopList(CoprList->FirstCopList);
FreeMem(CoprList,sizeof(*CoprList));
}
FreeIntr(Intr);
if (ASignal != -1) FreeSignal(ASignal);
if (IntuitionBase != NULL)
CloseLibrary(IntuitionBase);
if (GfxBase != NULL)
CloseLibrary(GfxBase);
exit(error);
}